Свойство CountOfVisibleLines.

Возвращает значение типа Long, содержащее число строк, которые являются видимыми в области программы. Только для чтения.

Пример
В следующем примере свойство CountOfVisibleLines используется для определения числа видимых одновременно строк в указанной области окна программы при заданной высоте этой области.

Debug.Print Application.VBE.Codepanes(3).CountOfVisibleLines
Hosted by uCoz